Multimodality

Exploring the multimodality of rodent ISDs using Gaussian mixture models (after Thibault et al 2011).

gmms <- lapply(isds, fit_gmm)

fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%
fitting ...

  |                                                                          
  |                                                                    |   0%
  |                                                                          
  |====                                                                |   6%
  |                                                                          
  |========                                                            |  12%
  |                                                                          
  |=============                                                       |  19%
  |                                                                          
  |=================                                                   |  25%
  |                                                                          
  |=====================                                               |  31%
  |                                                                          
  |==========================                                          |  38%
  |                                                                          
  |==============================                                      |  44%
  |                                                                          
  |==================================                                  |  50%
  |                                                                          
  |======================================                              |  56%
  |                                                                          
  |==========================================                          |  62%
  |                                                                          
  |===============================================                     |  69%
  |                                                                          
  |===================================================                 |  75%
  |                                                                          
  |=======================================================             |  81%
  |                                                                          
  |============================================================        |  88%
  |                                                                          
  |================================================================    |  94%
  |                                                                          
  |====================================================================| 100%

names(gmms) <- names(communities)

[1] "andrews"
[1] "niwot"

[1] "portal"

[1] "sev-5pgrass"

[1] "sev-5plarrea"

[1] "sev-goatdraw"

[1] "sev-rsgrass"

[1] "sev-rslarrea"

[1] "sev-two22"

nmodes <- vapply(gmms, FUN = get_nmodes, FUN.VALUE = 3)
nmodes

     andrews        niwot       portal  sev-5pgrass sev-5plarrea sev-goatdraw 
           3            4            9            4            4            3 
 sev-rsgrass sev-rslarrea    sev-two22 
           4            7            4